unit Conversion;

interface

uses
  Forms, db, Dialogs, Controls, Classes;

type
  TConversions = class
    class procedure StandardConversion;
  end;

implementation

uses main;

class procedure TConversions.StandardConversion;
var
  lvSrcFile: TextFile;

  lvTotal  : integer;
  lvCurrent: integer;
begin
  frmMain.tblDest.Open;
  lvTotal := frmMain.tblDest.RecordCount;
  frmMain.tblDest.First;



  frmMain.tblDest.Post;
  frmMain.tblDest.Close;
end;

end.
